15 DATA169,3,160,9,32,217,3,96,,1,96,1,254,17,,26,3,,32,,,1,,96,1,,1,239,,216:HGR:TEXT:HOME:FORI=768TO796:READA:POKEI,A:NEXTI:CALL768
20 POKE8244,36:POKE8388,255:POKE8389,255:POKE789,2:CALL768:PRINT"UN AUTRE DISK A MODIFIER (O/N)";:GETCH$:IFCH$="O"THENPRINT"INSERTEZ LE DISK":GETZZ$:GOTO20